home *** CD-ROM | disk | FTP | other *** search
/ Adventures with Oslo: Tools & Gadgets / Adventures with Oslo - Tools and Gadgets.ISO / mac / Ad / Mod02 / Shop / Bookstre / 00057.ls < prev    next >
Encoding:
Text File  |  1994-09-23  |  298 b   |  15 lines
  1. on mouseUp
  2.   global gBackPack
  3.   set index to getPos(gBackPack, #coins)
  4.   if index <> 0 then
  5.     deleteAt(gBackPack, index)
  6.     puppetSound("Pinball Bumper.S")
  7.     updateStage()
  8.     play movie "wordpath.dir"
  9.   else
  10.     puppetSound("Dink Dink.S")
  11.     updateStage()
  12.     play frame "dBox"
  13.   end if
  14. end
  15.